"
A TrivialCritique with and extended actions to open a dependency browser for ArchitecturalRule
"
Class {
	#name : 'ArchitecturalCritique',
	#superclass : 'ReTrivialCritique',
	#category : 'Specific-Rules-Architectural',
	#package : 'Specific-Rules',
	#tag : 'Architectural'
}

{ #category : 'actions' }
ArchitecturalCritique >> actions [
	^ super actions copyWith:
		(RePropertyAction new
			icon: (self iconNamed: #smallWindow);
			description: 'Open dependency analyzer';
			action: [ :crit :package |
				self openDependencyAnalyzerOn: package ];
			yourself)
]

{ #category : 'actions' }
ArchitecturalCritique >> openDependencyAnalyzerOn: package [

	^ (StPackageDependenciesPresenter onPackagesNamed: { package name }) open
]
